home *** CD-ROM | disk | FTP | other *** search
/ Live 4 / Live - Issue 4 (1994-03-15)(Dream Dealers)(Disk 1 of 2).adf / InStAlL-LiVe < prev    next >
Text File  |  1994-02-28  |  4KB  |  125 lines
  1. ;
  2. ; LIVE InStAlL ScRiPt !!
  3. ; $VER: Live Install Script for installer v1.1 (3/Jan/94)
  4. ;
  5.  
  6. (
  7.    (complete 0)
  8. ; Remove these two assigns first
  9.    (makeassign "LIVE_1:")
  10.    (makeassign "LIVE_2:")
  11.  
  12. ; Ask where to install LIVE
  13.    (set @default-dest "Work:")
  14.    (set dest1
  15.       (askdir
  16.          (prompt "Select the location to install the LIVE directory.")
  17.          (help "Choose a destination partition or directory"
  18.                  " to contain LIVE. The Installer will"
  19.                  " create a directory called 'LIVE' in the"
  20.                  " location directory you choose and then copy"
  21.                  " LIVE's files to it."
  22.          (default @default-dest)
  23.          )
  24.       )
  25.    )
  26.  
  27.    (set @default-dest (tackon dest1 "LIVE"))
  28.  
  29.    (if (exists @default-dest
  30.                (noreq))
  31.       (message "\n\nThe LIVE Directory already exists.\n"
  32.                "Do you still want to install LIVE ?\n\n"
  33.                "If you decide to continue, then LIVE will be"
  34.                " be merged into this old directory.\n\n"
  35.                "Anyway, it is strongly advised to stop the"
  36.                " installation, to erase the old LIVE directory,"
  37.                " to remove the ASSIGNs in your user-startup"
  38.                " and to re-install LIVE again.")
  39.       (message "\n\n\n\n\nLIVE will be installed in " @default-dest
  40.                "\n\nPlease confirm this action."))
  41.  
  42. ; Make some directories
  43.    (makedir @default-dest (safe) (infos))
  44.    (makedir ("%s/TiTlEpIc" @default-dest) (safe))
  45.    (makedir ("%s/MuSiC" @default-dest) (safe))
  46.    (makedir ("%s/DeSiGn It" @default-dest) (safe))
  47.    (makedir ("%s/GaLlErY" @default-dest) (safe))
  48.    (complete 5)
  49.  
  50. ; Install disk 1
  51.    (askdisk (prompt "\n\n\n\n\nPlease insert the first disk of LIVE #4")
  52.             (help "\n\n\n\n\nDon't ask why! Do what we want you to do!!!")
  53.             (dest "LIVE_1"))
  54.  
  55.    (set picdest (tackon @default-dest "TiTlEpIc/"))
  56.    (copyfiles (source "LIVE_1:TiTlEpIc/")
  57.               (dest picdest)
  58.               (all))
  59.  
  60.    (complete 10)
  61.    (set musicdest (tackon @default-dest "MuSiC/"))
  62.    (copyfiles (source "LIVE_1:MuSiC/")
  63.               (dest musicdest)
  64.               (all))
  65.  
  66.    (complete 20)
  67.    (set designdest (tackon @default-dest "DeSiGn It/"))
  68.    (copyfiles (source "LIVE_1:DeSiGn It/")
  69.               (dest designdest)
  70.               (all))
  71.  
  72.    (complete 25)
  73.    (copylib (source "LIVE_1:LiBs/")
  74.              (dest "LIBS:"))
  75.  
  76.  
  77.    (complete 30)
  78.    (copyfiles (source "LIVE_1:LiVe")
  79.               (dest @default-dest))
  80.  
  81.    (copyfiles (source "LIVE_1:LiVe.info")
  82.               (dest @default-dest))
  83.  
  84.    (complete 50)
  85. ; Install disk 2
  86.    (askdisk (prompt "\n\n\n\n\nPlease insert the second disk of LIVE #4")
  87.             (help "\n\n\n\n\nDon't ask why! Do what we want you to do!!!")
  88.             (dest "LIVE_2"))
  89.  
  90.    (set gallerydest (tackon @default-dest "GalLeRy/"))
  91.    (copyfiles (source "LIVE_2:gallery")
  92.               (dest gallerydest)
  93.               (all))
  94.  
  95.    (complete 75)
  96.    (set musicdest (tackon @default-dest "MuSiC/"))
  97.    (copyfiles (source "LIVE_2:MuSiC/")
  98.               (dest musicdest)
  99.               (all))
  100.  
  101.    (complete 95)
  102. ; ask to modify the user-startup
  103.    (startup "LIVE"
  104.             (prompt "\n\nDo you want to put the following lines\n"
  105.                     "in your startup-sequence ?\n\n\n"
  106.                     ("assign LIVE_1: %s\n" @default-dest)
  107.                     ("assign LIVE_2: %s\n" @default-dest))
  108.             (help "\n\n\nLive need these listed logical ASSIGNs to"
  109.                   " find its files."
  110.                   " If you want, these ASSIGNs"
  111.                   " will be written in you startup-sequence"
  112.                   " if not, you will have to write them yourself"
  113.                   " in your startup-sequence otherwise LIVE"
  114.                   " won't work.")
  115.             (command ("assign LIVE_1: %s\n" @default-dest)
  116.                      ("assign LIVE_2: %s\n" @default-dest)))
  117.  
  118. ; Some assigns to play with LIVE right now !
  119.    (makeassign "LIVE_1:" @default-dest)
  120.    (makeassign "LIVE_2:" @default-dest)
  121.  
  122.    (complete 100)
  123.  
  124. ; Houba! That's done !
  125. )